radek=26;
%nazew='Nahodna matice: ';
switch radek
case 1
    nazew='Nahodna matice: ';
case 2
    nazew='Jednotka matice: ';
case 3
    nazew='Kopie matice: ';
case 4
    nazew='Prevod na pole: ';
case 5
    nazew='Ziskani 1/4 matice: ';
case 6
    nazew='Transponovani matice: ';
case 7
    nzew='norm1: ';
case 8
    nazew='norm2: ';
case 9
    nazew='normInf: ';
case 10
    nazew='normFro: ';
case 11
    nazew='Unary minus: ';
case 12
    nazew='Scitani matice: ';
case 13
    nazew='Odecitani matice: ';
case 14
    nazew='Nasobeni po slozkach: ';
case 15
    nazew='Deleni po slozkach (R): ';
case 16
    nazew='Deleni po slozkach (L): ';
case 17
    nazew='Nasobeni matice prvkem: ';
case 18
    nazew='Nasobeni matice: ';
case 19
    nazew='Inverzni matice: ';
case 20
    nazew='Hodnost matice: ';
case 21
    nazew='Determinant matice: ';
case 22
    nazew='LU rozklad: ';
case 23
    nazew='QR rozklad: ';
case 24
    nazew='Choleskeho rozklad: ';
case 25
    nazew='SVD rozkald: ';
case 26
    nazew='Vlastni cisla: ';
otherwise
    disp('Unknown method.')
end







wcd=cd;
cd ..;
velikost1='10';
velikost2='100';
velikost3='500';
velikost4='1000';


pripona='.csv';
nazev='time_cpp';
cesta=[nazev velikost1 pripona];
cpp1=load(cesta);

nazev='time_j';
cesta=[nazev velikost1 pripona];
j1=load(cesta);

nazev='time_cs';
cesta=[nazev velikost1 pripona];
cs1=load(cesta);

nazev='time_m';
cesta=[nazev velikost1 pripona];
m1=load(cesta);



pripona='.csv';
nazev='time_cpp';
cesta=[nazev velikost2 pripona];
cpp2=load(cesta);

nazev='time_j';
cesta=[nazev velikost2 pripona];
j2=load(cesta);

nazev='time_cs';
cesta=[nazev velikost2 pripona];
cs2=load(cesta);

nazev='time_m';
cesta=[nazev velikost2 pripona];
m2=load(cesta);



pripona='.csv';
nazev='time_cpp';
cesta=[nazev velikost3 pripona];
cpp3=load(cesta);

nazev='time_j';
cesta=[nazev velikost3 pripona];
j3=load(cesta);

nazev='time_cs';
cesta=[nazev velikost3 pripona];
cs3=load(cesta);

nazev='time_m';
cesta=[nazev velikost3 pripona];
m3=load(cesta);



pripona='.csv';
nazev='time_cpp';
cesta=[nazev velikost4 pripona];
cpp4=load(cesta);

nazev='time_j';
cesta=[nazev velikost4 pripona];
j4=load(cesta);

nazev='time_cs';
cesta=[nazev velikost4 pripona];
cs4=load(cesta);

nazev='time_m';
cesta=[nazev velikost4 pripona];
m4=load(cesta);



graf1=[cpp1(radek); cs1(radek); m1(radek); j1(radek)];
graf2=[cpp2(radek); cs2(radek); m2(radek); j2(radek)];
graf3=[cpp3(radek); cs3(radek); m3(radek); j3(radek)];
graf4=[cpp4(radek); cs4(radek); m4(radek); j4(radek)];

%figure
%nazev='Vlastni cislo'
%title(nazev 'a: sin(x)')

subplot(2,2,1)
bar(graf1)
axis([0.5  4.5  0  Inf])

nazew1=[nazew velikost1];
title(nazew1)
set(gca,'XTickLabel',{'cpp','cs','matlab','java'})
ylabel('t [ms]') 

% pick the upper right of the 4 subplots
subplot(2,2,2)
bar(graf2)
axis([0.5  4.5  0  Inf])

nazew2=[nazew velikost2];
title(nazew2)
%xlabel('cpp  cs  matlab java      ')
set(gca,'XTickLabel',{'cpp','cs','matlab','java'})
ylabel('t [ms]') 

% pick the lower left of the 4 subplots
subplot(2,2,3)
bar(graf3)
axis([0.5  4.5  0  Inf])

nazew3=[nazew velikost3];
title(nazew3)
set(gca,'XTickLabel',{'cpp','cs','matlab','java'})
ylabel('t [ms]') 

% pick the lower right of the 4 subplots
subplot(2,2,4)
bar(graf4)
axis([0.5  4.5  0  Inf])

nazew4=[nazew velikost4];
title(nazew4)
set(gca,'XTickLabel',{'cpp','cs','matlab','java'})
ylabel('t [ms]') 


cd pic;
%saveas(gcf, file_export, 'png');
saveas(gcf, num2str(radek), 'png');

cd(wcd);
